home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 05 - 1989 / 05.03 Mar 89 / MPWSource Code / ChangeTextRes.r < prev    next >
Encoding:
Text File  |  1988-11-08  |  3.4 KB  |  118 lines  |  [TEXT/MPS ]
  1. /*
  2.     ChangeTextRes.r
  3.     
  4.     This file contains only one resource which defines
  5.     the commando interface for the MPW Tool ChangeTextRes
  6.  
  7. */
  8.  
  9. #include "cmdo.r"
  10.  
  11. resource 'cmdo' (128, "ChangeTextRes") {
  12.     { /* array dialogs: 2 elements */
  13.         300,
  14.         "ChangeTextRes, an MPW Tool that deletes MPW text file resources",
  15.             {    /* array itemArray: 3 items */
  16.                 /* [1] */
  17.                 NotDependent { }, RadioButtons {
  18.                     { /* array radioArray: 10 elements */
  19.                         /* [1] */
  20.                         {40, 30, 55, 60}, "1", "-t 1", notSet, "Set tabs to one spaces",
  21.                         /* [2] */
  22.                         {60, 30, 75, 60}, "2", "-t 2", notSet, "Set tabs to two spaces",
  23.                         /* [3] */
  24.                         {80, 30, 95, 60}, "3", "-t 3", Set, "Set tabs to three spaces",
  25.                         /* [4] */
  26.                         {100, 30, 115, 60}, "4", "-t 4", notSet, "Set tabs to four spaces",
  27.                         /* [5] */
  28.                         {120, 30, 135, 60}, "5", "-t 5", notSet, "Set tabs to five spaces",
  29.                         /* [6] */
  30.                         {140, 30, 155, 60}, "6", "-t 6", notSet, "Set tabs to six spaces",
  31.                         /* [7] */
  32.                         {160, 30, 175, 60}, "7", "-t 7", notSet, "Set tabs to seven spaces",
  33.  
  34.                         /* [8] */
  35.                         {40, 100, 55, 140}, "8", "-t 8", notSet, "Set tabs to eight spaces",
  36.                         /* [9] */
  37.                         {60, 100, 75, 140}, "9", "-t 9", notSet, "Set tabs to nine spaces",
  38.                         /* [10] */
  39.                         {80, 100, 95, 140}, "10", "-t 10", notSet, "Set tabs to ten spaces",
  40.                         /* [11] */
  41.                         {100, 100, 115, 140}, "11", "-t 11", notSet, "Set tabs to eleven spaces",
  42.                         /* [12] */
  43.                         {120, 100, 135, 140}, "12", "-t 12", notSet, "Set tabs to twelve spaces",
  44.                         /* [13] */
  45.                         {140, 100, 155, 140}, "13", "-t 13", notSet, "Set tabs to thirteen spaces",
  46.                         /* [14] */
  47.                         {160, 100, 175, 140}, "14", "-t 14", notSet, "Set tabs to fourteen spaces",
  48.  
  49.                         /* [15] */
  50.                         {40, 170, 55, 210}, "15", "-t 15", notSet, "Set tabs to fifteen spaces",
  51.                         /* [16] */
  52.                         {60, 170, 75, 210}, "16", "-t 16", notSet, "Set tabs to sixteen spaces",
  53.                         /* [17] */
  54.                         {80, 170, 95, 210}, "17", "-t 17", notSet, "Set tabs to seventeen spaces",
  55.                         /* [18] */
  56.                         {100, 170, 115, 210}, "18", "-t 18", notSet, "Set tabs to eighteen spaces",
  57.                         /* [19] */
  58.                         {120, 170, 135, 210}, "19", "-t 19", notSet, "Set tabs to nineteen spaces",
  59.                         /* [20] */
  60.                         {140, 170, 155, 210}, "20", "-t 20", notSet, "Set tabs to twenty spaces",
  61.                         /* [21] */
  62.                         {160, 170, 175, 210}, "21", "-t 21", notSet, "Set tabs to twenty one spaces",
  63.                     }    /* array radioArray */
  64.                 },    /* RadioButtons cluster */
  65.                 
  66.                 NotDependent { }, TextBox {
  67.                     gray,
  68.                     {30, 20,185, 220 },
  69.                     "Tab Setting"
  70.                 },
  71.  
  72.                 /* [3] */
  73.                 NotDependent { }, PopUp    {
  74.                     Font,
  75.                     {20, 250, 40, 320},
  76.                     {20, 330, 40, 450},
  77.                     "Font",
  78.                     "-f",
  79.                     "Select font specified files are to assume",
  80.                     hasDefault
  81.                 },
  82.                 
  83.                 Or {{1}}, EditPopUp {
  84.                     FontSize,
  85.                     {50, 250, 70, 320},
  86.                     {50, 330, 70, 400},
  87.                     "Font Size",
  88.                     "-s",
  89.                     "User definable font",
  90.                     "Select from available fonts"
  91.                 },
  92.                 
  93.                 NotDependent { }, MultiFiles {
  94.                     "Files…",
  95.                     "Select files who's resources are to be deleted",
  96.                     {155, 350, 175, 450},
  97.                     "",
  98.                     "",
  99.                     MultiInputFiles {
  100.                         {text},
  101.                         "",
  102.                         "",
  103.                         ""
  104.                     }
  105.                 },
  106.                 
  107.                 NotDependent { }, CheckOption {
  108.                     NotSet,
  109.                     {100, 250, 115, 425},
  110.                     "Delete resource fork",
  111.                     "-d",
  112.                     "Delete all resources for the selected files"
  113.                 }
  114.             }    /* array itemArray */
  115.     }    /* array dialogs */
  116. };
  117.  
  118.